home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2004 April
/
CMCD0404.ISO
/
Software
/
Shareware
/
Programare
/
sharp
/
wwwSharp_setup.exe
/
{app}
/
Examples
/
RssPublisher
/
Source
/
index.hta
< prev
next >
Wrap
Text File
|
2004-02-04
|
5KB
|
203 lines
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE>RSS publisher</TITLE>
<META http-equiv="Content-Type" content="text/html; charset=windows-1252">
<META name="GENERATOR" content="MSHTML 6.00.2800.1276">
<META http-equiv="MSThemeCompatible" content="Yes">
<HTA:APPLICATION
id="Application"
APPLICATIONNAME="RSS publisher"
BORDER="thick"
BORDERSTYLE="normal"
CAPTION="yes"
CONTEXTMENU="no"
INNERBORDER="yes"
MAXIMIZEBUTTON="yes"
MINIMIZEBUTTON="yes"
NAVIGABLE="yes"
SCROLL="yes"
SCROLLFLAT="no"
SELECTION="yes"
SHOWINTASKBAR="yes"
SINGLEINSTANCE="no"
SYSMENU="yes"
VERSION="1.00"
WINDOWSTATE="normal"
ICON="RssPublisher.ico"></HTA:APPLICATION>
<LINK href="RssPublisher.css" type="text/css" rel="stylesheet">
<OBJECT classid="clsid:5220cb21-c88d-11cf-b347-00aa00a28331">
<PARAM name="LPKPath" value="comdlg.lpk">
</OBJECT>
<OBJECT id="cDialog" codeBase="http://activex.microsoft.com/controls/vb5/comdlg32.cab"
height="0px" width="0px" classid="CLSID:F9043C85-F6F2-101A-A3C9-08002B2F49FB">
</OBJECT>
<SCRIPT language="VBScript" src="RssPub.vbs"></SCRIPT>
<SCRIPT language="VBScript" src="RssPublisher.vbs"></SCRIPT>
</HEAD>
<BODY>
<H2>Site</H2>
<DIV id="divSite">
<TABLE id="tblSite" cols="4" border="0">
<TBODY>
<TR>
<TD width="100">Title</TD>
<TD width="200">
<INPUT id="inpSiteTitle">
</TD>
<TD width="100">URL</TD>
<TD width="200">
<INPUT id="inpSiteURL">
</TD>
</TR>
<TR>
<TD>Description</TD>
<TD>
<TEXTAREA id="inpSiteDescription"></TEXTAREA>
</TD>
<TD>Details</TD>
<TD>
<TEXTAREA id="inpSiteDetails"></TEXTAREA>
</TD>
</TR>
<TR>
<TD>Image URL</TD>
<TD>
<INPUT id="inpSiteImageURL">
</TD>
<TD>Further reading</TD>
<TD>
<INPUT id="inpSiteFurtherReading">
</TD>
</TR>
<TR>
<TD>Author names</TD>
<TD>
<INPUT id="inpSiteAuthorNames">
</TD>
<TD>Author e-mails</TD>
<TD>
<INPUT id="inpSiteAuthorEmails">
</TD>
</TR>
</TBODY>
</TABLE>
</DIV>
<DIV id="divControls">
<TABLE border="0">
<TBODY>
<TR>
<TD>
<BUTTON id="btnOpenRSS" onclick="OnBtnOpenRSSClick()">Open RSS</BUTTON>
</TD>
<TD>
<BUTTON id="btnPreview" onclick="OnBtnPreviewClick()">Preview</BUTTON>
</TD>
<TD>
<BUTTON id="btnImportADO" onclick="OnBtnImportADOClick()">Import from ADO</BUTTON>
</TD>
<TD>
<BUTTON id="btnImportAccess" onclick="OnBtnImportAccessClick()">Import from
Access</BUTTON>
</TD>
<TD>
<BUTTON id="btnImportExcel" onclick="OnBtnImportExcelClick()">Import from
Excel</BUTTON>
</TD>
</TR>
<TR>
<TD>
<BUTTON id="btnSaveRSS" onclick="OnBtnSaveRSSClick()">Save RSS</BUTTON>
</TD>
<TD></TD>
<TD>
<BUTTON id="btnExportADO" onclick="OnBtnExportADOClick()">Export to ADO</BUTTON>
</TD>
<TD>
<BUTTON id="btnExportAccess" onclick="OnBtnExportAccessClick()">Export to
Access</BUTTON>
</TD>
<TD>
<BUTTON id="btnExportToExcel" onclick="OnBtnExportToExcelClick()">Export to
Excel</BUTTON>
</TD>
</TR>
</TBODY>
</TABLE>
</DIV>
<DIV id="divArticles">
<DIV id="divArticleList">
<TABLE id="tblArticleList" onclick="OnTblArticleListClick()" width="100%" border="0">
<TBODY></TBODY>
</TABLE>
</DIV>
<BUTTON id="btnAddArticle" onclick="OnBtnAddArticleClick()">Add article</BUTTON>
<BUTTON id="btnRemoveArticle" onclick="OnBtnRemoveArticleClick()">Remove article
</BUTTON>
<H2>Current article</H2>
<TABLE id="tblArticle" cols="2" border="0">
<TBODY>
<TR>
<TD width="15%">Title</TD>
<TD width="35%">
<INPUT id="inpArticleTitle">
</TD>
</TR>
<TR>
<TD width="15%">Description</TD>
<TD width="35%">
<INPUT id="inpArticleDescription">
</TD>
</TR>
<TR>
<TD>URL</TD>
<TD>
<INPUT id="inpArticleURL">
</TD>
</TR>
<TR>
<TD>Date</TD>
<TD>
<INPUT id="inpArticleDate">
</TD>
</TR>
<TR>
<TD>Category</TD>
<TD>
<INPUT id="inpArticleCategory">
</TD>
</TR>
<TR>
<TD>Keywords</TD>
<TD>
<INPUT id="inpArticleKeywords">
</TD>
</TR>
<TR>
<TD>Author names</TD>
<TD>
<INPUT id="inpArticleAuthorNames">
</TD>
</TR>
<TR>
<TD>Author e-mails</TD>
<TD>
<INPUT id="inpArticleAuthorEmails">
</TD>
</TR>
</TBODY>
</TABLE>
<BUTTON id="btnUpdateArticle" onclick="OnBtnUpdateArticleClick()">Update article
</BUTTON>
</DIV>
<DIV id="divFooter">
<P id="creator">Created with <A href="http://www-sharp.com" target="_blank"><STRONG>www-Sharp</STRONG></A>.
</P>
</DIV>
</BODY>
</HTML>